Bis auf Datum und Name kommen alle anderen Datensätze zusammen aus einer anderen Tabelle die im Tabellenblatt Inventurliste aufgelistet ist. Über die Inventurliste werden die jeweiligen Bestände von Artikeln mittels Barcode Scanner je nach Bedarf eingebucht oder ausgebucht. Sollte der Bestand von einen Artikel die Mindestmenge unterschreiten, dann soll dieser bestellt werden. Dazu werden alle Datensätze bei denen der Mindestbestand unterschritten ist über einen Button in ein anderes Tabellenblatt (Bestellliste) übertragen. Das funktioniert soweit alles auch.

Hier ist der Code für das Filtern und Kopieren der Daten aus der Tabelle im Tabellenblatt Inventurliste:

Sub Tabelle_Filtern_und_Kopieren()

'-- Das Tabellenblatt aktivieren
ThisWorkbook.Worksheets("Inventurliste").Activate

'-- Filter Einstellungen auf Null setzen
ActiveSheet.Range("Tabelle2").AutoFilter

'-- Filter wählen - Spalte:Bestellen = "-1" ( -1 = Rote Ampel! ;  Filtere alle Artikel heraus bei denen die Mindestmenge unterschritten ist
ActiveSheet.Range("Tabelle2").AutoFilter 12, "-1"

'-- Alle Daten aus Tabelle 2 mit der Autofilter Einstellung "-1" (Rote Ampel Mindestmenge unterschritten) in Tabellenblatt Bestellliste untereinander kopieren
ActiveSheet.Range("Tabelle2").Copy

'-- Einfügen der Daten in erste freie Zeile von Spalte "D" in Bestellliste
Sheets("Bestellliste").Cells(Rows.Count, 4).End(xlUp).Offset(1, 0).PasteSpecial xlPasteValues

'-- Kopiermodus beenden
Application.CutCopyMode = False

'-- Das Tabellenblatt erneut aktivieren
ThisWorkbook.Worksheets("Inventurliste").Activate

'-- Filter Einstellungen auf Null setzen
ActiveSheet.Range("Tabelle2").AutoFilter

End Sub

Wenn jetzt so eine Bestellung "ausgeführt" wird, fehlt in der Bestellliste das Datum und der Name der Person die die Bestellung aufgegeben hat.
Im Tabellenblatt Inventurliste steht oberhalb der Tabelle in der alle benötigten Daten für die Bestellung enthalten sind in der Zeile "M4" das aktuelle Datum und in "N4" kann über ein Dropdown Menü der Name der Person ausgewählt werden, die die Bestellung auslösen möchte.

Wenn also eine Person die Daten aus der Inventurliste in die Bestellliste über den Button übertragt, soll auch das Datum (Spalte B) und der Name der Person (Spalte C) in den jeweiligen Zeilen der Datensätze auf dem Tabellenblatt Bestellliste auftauchen, welche gerade von der jeweiligen Person übertragen wurden, damit man zuordnen kann, welche Person welche Bestellung aufgegeben hat.

Sollten z.B. 3 Artikel die Mindestmenge unterschritten haben und eine Person möchte diese über den Button "bestellen", werden die Datensätze aus der Inventurliste in die Bestellliste übertragen, allerdings steht in den drei hinzugefügten Zeilen auf dem Tabellenblatt Bestellliste dann noch nicht der Name und das Datum. Der Name und das aktuelle Datum soll aber ausschließlich für diese drei hinzugefügten Zeilen kopiert werden.
Die Bestellliste wird von der Anzahl der Datensätzen mit der Zeit immer weiter wachsen.

Idealerweise werden jetzt nicht nur die Datensätze aus der Inventurliste in die Bestellliste eingeplegt, sondern zeitgleich auch Name und das aktuelle Datum.